home *** CD-ROM | disk | FTP | other *** search
/ Freelog 112 / FreelogNo112-NovembreDecembre2012.iso / Jeu / deadlyrace / deadlyrace_setup.exe / {app} / Data / Scripts / intro.lua < prev    next >
Encoding:
Text File  |  2010-03-19  |  1008 b   |  60 lines
  1. local script = globalObject;
  2.  
  3. local interface;
  4. local commandMap = {};
  5.  
  6. local x = 0;
  7. local y = 0;
  8. local z = 0;
  9. local aim = nil;
  10.  
  11.  
  12. local function ExecuteCommands()
  13.     while(SetNextCommand(script))
  14.     do
  15.         local command = GetCurrentCommand(script);
  16.         if (commandMap[command])
  17.         then
  18.             commandMap[command]();
  19.         end
  20.     end
  21. end
  22.  
  23. local ftime = 0;
  24.  
  25. local function AddObject()
  26.     local obj = GetCurrentParams(script);
  27.     interface = StringToPointer(obj);
  28. --    AddRef(interface);
  29.  
  30. end
  31.  
  32. local function DeleteObject()
  33.     Release(interface);
  34.     StopScript(script);
  35.     interface = nil;
  36. end
  37.  
  38. local function ReleaseAll()
  39.     Release(interface);
  40.     interface = nil;
  41. end
  42.  
  43. local function UpdateGameInterface1()
  44.     UpdateGameInterface(interface);
  45. end
  46.  
  47.  
  48.  
  49. commandMap["release_all"] = ReleaseAll;
  50. commandMap["add_object"] = AddObject;
  51. commandMap["delete_object"] = DeleteObject;commandMap["video_end"] = VideoEnd;
  52.  
  53. while(true)
  54. do
  55.     ExecuteCommands();
  56.     UpdateInterface(interface);
  57.     
  58.     Update();
  59. end
  60.